﻿Imports System.Data.OleDb

Public Class DataProvider
    Public Shared Function OpenConnect() As OleDbConnection
        Dim cnstring As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source='QLNhaHang.mdb'"
        Dim cn As New OleDbConnection(cnstring)
        cn.Open()
        Return cn
    End Function
End Class
